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loop{ 
wait 

if (S==S_PARENT) { 

if (E . m_ty pe==M_N OTI FY) { 
if (E . m_addr !=M) ( 
assign_P (E. m_addr) ; 
send (P, M_N EGOTI ATE , M) ; 
trans (S_NEGOTIATING) ; 

} 

}else 

if (E . m_type==M_FORWARD) { 

ignore ( ) ; 
}gIsg 

if (E . m_type==M_REPORT) { 
if (E . m_addr !=M) { 
assign_P (E. m_addr) ; 
send (P, M_N EGOTI ATE , M) ; 
trans (S_NEGOTIATING) ; 

} 

if (E . m_type==M_NEGOTIATE) { 
assign_P (decide (E. m_addr , M) ; 
if (P==M) { 
send (E . m_addr , M_IAM ,M)) ; 
trans (S_NEGOTIATING) ; 

J glSG { 

send (E . m_addr , M_YOUARE) ; 
send (P. M_JOIN , M) ; 
send_C (M_FORWARD , P) ; 
empty_C ( ) ; 
trans (S_CHILD) ; 
} 

}gIs© 

if (E . m_type==M_IAM) { 
ignore ( ) ; 
}els© 

if (E . m_type==M_YOUARE) { 
ignore ( ) ; 

}©IS6 

if (E . m_type==M_BUSY) { 

ignore ( ) ; 
}else 

if (E . m_type==M_JOIN) { 
add_C (E . m_addr) ; 

}GlS6 

if (E . m_type==M_ERROR) { 

ignore ( ) ; 
}gIsg 

if (E . m_type==M_TIMOUT) { 
broadcast (M_NOTIFY , M) ; 

} 

}else 
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if (S==S_NEGOTIATING) { 
if (E . m_type==M_NOTIFY) { 

ignore ( ) ; 
}gIsg 

if (E . m_type==M_FORWARD) { 
if (E . m_addr==M) { 
assign_P (M) ; 
trans (S_PARENT) ; 
}else{ 

assign_P (E. m_addr) ; 

send (P , M_NEGOTIATE , M) ; 

} 

}gIsg 

if (E . m_type==M_REPORT) { 

ignore ( ) ; 
}gIsg 

if (E . m_type==M_NEGOTIATE) { 
if (P==E . m_addr && decide (P , M)==P) { 
send (E . m_addr , M_YOUARE) ; 

}GlSG{ 

send (E . m_addr , M_BUSY) ; 

} 

}gIsg 

if (E . m_type==M JAM) { 

assign_P (E . m_addr) ; 

send (P , M_JOIN , M) ; 

send_C (M_FORWARD , P) ; 

empty_C ( ) ; 

trans (S_CHILD) ; 
}gIsg 

if (E . m_type==M_YOUARE) { 
assign_P (M) ; 
trans (S_PARENT) ; 

}gIsg 

if (E . m_type==M_BUSY) { 

send (P , M_NEGOTIATE , M) ; 
}gIsg 

if (E . m_typG==M_JOIN) { 

add_C (E . m_addr) ; 
}gIsg 

if (E . m_type==E_ERROR) { 

assign_P (M) ; 

trans (S_PARENT) ; 
}gIsg 

if (E . m_type==E_TIMEOUT) { 
assign_P (M) ; 
trans (S_PARENT) ; 

} 

}else 
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if (S==S_CHILD) { 

if (E . m_type==E_NOTIFY) { 
if(E.m_addr !=P) { 
send (P , M_REPORT , E . m_addr) ; 

> 

}gI$g 

if (E . m_type==E_FORWARD) { 
assign_P (E . m_addr) ; 
if (P==M) { 

trans (S_PARENT) ; 
}gIsg{ 

send (P , M JOIN , M) ; 
} 

} 

if (E . m_ty pe==M_R E PORT) { 
send (E . m_form , M_FORWARD , P) ; 

}gIsg 

if (E . m_addr , M_FORWARD , P) ; 

send (E . m_form , M_FORWARD , P) ; 
}else 

if (E . m_type=M_IAM) { 
ignore ( ) ; 

}GlS6 

if (E . m_type=M_YOUARE) { 

ignore ( ) ; 
}gIsg 

if (E . m_type=M_BUSY) { 

send (P , M_JOIN , M) ; 
}gIsg 

if (E . m_type==M_JOIN) { 
send (E . m_addr , M_FORWARD , P) ; 

}gIsg 

if (E . m_type==M_ERROR) { 

assign_P (M) ; 

trans (S_PARENT) ; 
}gIsg 

if (E . m_type=E_TIMEOUT) { 
broadcast (M_NOTIFY , P) ; 
trans (S_PARENT) ; 

} 

} 

} 
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Update own information as required 

Delete all elements from D[] for the updated line and add M to it 

if (M_COPY message arrived) 

Modify the table according to the message 

Delete all elements from D[] for the updated line and add addr to it 

} 

if (MJDELETE message arrived) { 

Delete a line with matching addr from the table 

} 

if (this process is parent) { 
for (all lines in the table) { 
if (deleting a line whose addr is not contained in C[]) { 
for (all elements T in C[]) { 
send (T , M_DELETE , addr) 

> 

} 

} 

for(all lines in the table) { 
for (C[] elements T that are not contained in D[]) { 
send (T , M_COPY , addr , <information>) 
Add T to D[] 
} 

} 

} else { 

for (all lines in the table) 
if (addr==M and P not contained in D[]) 
send (P , M_COPY , M , <information>) 
Add P to D[] 

} 

} 

} 

} 
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